home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / fk20.asm < prev    next >
Encoding:
Assembly Source File  |  1985-06-03  |  2.0 KB  |  63 lines
  1.  
  2. TITLE FK20 - ASSEMBLER PROGRAM TO SET FUNCTION KEYS IN DOS 2.0
  3. ; Assemble this with MASM or ASM
  4. ; Then LINK it with   LINK FK20;
  5. ; an error msg about no STACK is OK.
  6. ; either include    FK20 in your AUTOEXEC or just type   FK20.
  7. ;
  8. ; IMPORTANT NOTE ----------************
  9. ;  For this routine to work, you must create a file called
  10. ;
  11. ;          CONFIG.SYS
  12. ;
  13. ; with an ASCII editor and put the statement     DEVICE=ANSI.SYS  in it.
  14. ; This will load a file called  ANSI.SYS from the DOS disk when the system
  15. ; is booted.
  16. ;                                              Gene Plantz  03/13/83
  17. SUBTTL DESCRIPTION OF THE STACK SEGMENT
  18.     PAGE
  19. SUBTTL DESCRIPTION OF THE DATA SEGMENT
  20. ;
  21. subttl desciption of dos interfaces
  22. cseg    segment para public 'CODE'
  23. start    proc    far
  24.     assume cs:cseg,ds:cseg,es:nothing 
  25.     push    ds            ;set up starting linkage as per example
  26.     sub    ax,ax            ;zero this and place on stack
  27.     push    ax            ;so that when we do a RET we go to 
  28.     push    cs                ;move the workarea address into DS
  29.         pop     ds
  30.     mov    dx,offset f10          ;reset F10 key 
  31.     mov    ah,9            ;function 9 is print string
  32.     int    21h            ;call dos to do it
  33.     mov    dx,offset f9           ;reset F10 key 
  34.     mov    ah,9            ;function 9 is print string
  35.     int    21h            ;call dos to do it
  36.     mov    dx,offset f8           ;reset F10 key 
  37.     mov    ah,9            ;function 9 is print string
  38.     int    21h            ;call dos to do it
  39.     mov    dx,offset f7           ;reset F10 key 
  40.     mov    ah,9            ;function 9 is print string
  41.     int    21h            ;call dos to do it
  42.     mov    dx,offset f6           ;reset F10 key 
  43.     mov    ah,9            ;function 9 is print string
  44.     int    21h            ;call dos to do it
  45.     mov    dx,offset f5           ;reset F10 key 
  46.     mov    ah,9            ;function 9 is print string
  47.     int    21h            ;call dos to do it
  48. ;
  49. ;
  50. exit:    ret
  51. f10     db    27,'[0;68;"DIR";13p$'
  52. f9      db    27,'[0;67;"PCMODEM";13p$'
  53. f8      db    27,'[0;66;"C:SD /D/P";13p$'
  54. f7      db    27,'[0;65;"DISKCOPY A: B:";13p$'
  55. f6      db    27,'[0;64;"C:";13p$'
  56. f5      db    27,'[0;63;"B:";13p$'
  57. start    endp
  58. ;
  59. ;
  60. cseg    ends
  61.     end    start
  62.                                                                  
  63.